
****Replication for "International Sanctions and Domestic Backlash. Exploring Public Support towards the EU's Rule of Law Enforcement"

***Michael Blauberger, Soso Makaradze and Gabriele Spilker

***To replicate the results you need to install the conjoint ado file


****Figure 1
***Left Panel

use "conjoint_final_Hungary.dta", clear


histogram rating, discrete fraction scheme(s1mono) xlabel(1(1)7) title("Hungary", size(4)) xtitle("Support for sanction proposal: 1 (no support) to 7 (high support)", size(3))

graph export "Rating_Hungary.jpg", as(jpg) name("Graph") replace


use "conjoint_final_Poland.dta", clear


histogram rating, discrete fraction scheme(s1mono) xlabel(1(1)7) title("Poland", size(4)) xtitle("Support for sanction proposal: 1 (no support) to 7 (high support)", size(3))

graph export "Rating_Poland.jpg", as(jpg) name("Graph") replace



***Figure 2

use "conjoint_final_Hungary.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new response consequence, est(mm) id(respondent) graph


graph export "General_Results_Hungary_MM.jpg", as(jpg) name("Graph") replace



***Figure 3

use "conjoint_final_Poland.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new response consequence, est(mm) id(respondent) graph


graph export "General_Results_Poland_MM.jpg", as(jpg) name("Graph") replace




****Table 2

use "conjoint_final_Hungary.dta", clear


sort partisanship

by partisanship: tab blame


use "conjoint_final_Poland.dta", clear


sort partisanship

by partisanship: tab blame



***Figure 4

use "conjoint_final_Bulgaria.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new response consequence, est(mm) id(respondent) graph


graph export "General_Results_Bulgaria_MM.jpg", as(jpg) name("Graph") replace


****************Appendix

**Figure A.1
use "conjoint_final_Hungary.dta", clear

 
conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence , est(amce) id(respondent) graph

graph export "General_Results_Hungary_AMCE.jpg", as(jpg) name("Graph") quality(90) replace



**Figure A.2
use "conjoint_final_Poland.dta", clear

 
conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence , est(amce) id(respondent) graph

graph export "General_Results_Poland_AMCE.jpg", as(jpg) name("Graph") quality(90) replace


***  Gender

**Figure A.3
use "conjoint_final_Hungary.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(Gender) graph (0)
graph export "General_Results_Hungary_MM_by_sex.jpg", as(jpg) name("Graph") quality(90) replace


**Figure A.4
use "conjoint_final_Poland.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(Gender) graph (0)
graph export "General_Results_Poland_MM_by_sex.jpg", as(jpg) name("Graph") quality(90) replace



*** Age
 
**Figure A.5
use "conjoint_final_Hungary.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(age) graph (0)
graph export "General_Results_Hungary_MM_by_Age.jpg", as(jpg) name("Graph") quality(90) replace


**Figure A.6
use "conjoint_final_Poland.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(age) graph (0)
graph export "General_Results_Poland_MM_by_Age.jpg", as(jpg) name("Graph") quality(90) replace



***Rural vs urban


**Figure A.7
use "conjoint_final_Hungary.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(Rural) graph (0)
graph export "General_Results_Hungary_MM_by_Rural.jpg", as(jpg) name("Graph") quality(90) replace


**Figure A.8
use "conjoint_final_Poland.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(Rural) graph (0)
graph export "General_Results_Poland_MM_by_Rural.jpg", as(jpg) name("Graph") quality(90) replace


***Income 


**Figure A.9
use "conjoint_final_Hungary.dta", clear


conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(Income) graph (0)
graph export "General_Results_Hungary_MM_by_Income.jpg", as(jpg) name("Graph") quality(90) replace


**Figure A.10
use "conjoint_final_Poland.dta", clear

conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(Income) graph (0)
graph export "General_Results_Poland_MM_by_Income.jpg", as(jpg) name("Graph") quality(90) replace



**** Education   


**Figure A.11
use "conjoint_final_Hungary.dta", clear

conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(education) graph (0)
graph export "General_Results_Hungary_MM_by_education.jpg", as(jpg) name("Graph") quality(90) replace


**Figure A.12
use "conjoint_final_Poland.dta", clear
 
conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence, est(mm) id(respondent) subgroup(education) graph (0)
graph export "General_Results_Poland_MM_by_education.jpg", as(jpg) name("Graph") quality(90) replace




**Figure A.13
use "conjoint_final_Bulgaria.dta", clear

 
conjoint choice accusation other_EU_states dom_opposition based_on_new  response consequence , est(amce) id(respondent) graph

graph export "General_Results_Bulgaria_AMCE.jpg", as(jpg) name("Graph") quality(90) replace




***use rating instead
**Figure A.14

use "conjoint_final_Hungary.dta", clear

conjoint rating accusation other_EU_states dom_opposition based_on_new  response consequence , est(amce) id(respondent) graph

graph export "General_Results_Hungary_AMCE_rating.jpg", as(jpg) name("Graph") quality(90) replace



**Figure A.15
use "conjoint_final_Poland.dta", clear

conjoint rating accusation other_EU_states dom_opposition based_on_new response consequence , est(amce) id(respondent) graph

graph export "General_Results_Poland_AMCE_rating.jpg", as(jpg) name("Graph") quality(90) replace








